Top 10k strings from MicroHobby Semanal - Issue 045-048 (1985)(Hobby Press)(es)(Side A).tzx
in <root> / bin / z80 / software / Sinclair Spectrum Collection TOSEC.exe / Sinclair ZX Spectrum - Magazines / Sinclair ZX Spectrum - Magazines - [TZX] (TOSEC-v2007-01-01) /
Back to the directory listing
16 y,x;a$(n); 5 punt=punt+100 5 ky,kx;" "; 5 fv,cv;d$(1 5 fb,cb;d$(1 5 ;"PARE LA CINTA": 5 4 y,x;a$(n): 4 ;"VIDAS:";vid; 4 ;"RECORD:";rec 4 ;"PUNTOS:";punt; 4 * * 3 ;"PULSE UNA TECLA": 3 ;" PARE LA CINTA ": 3 ;" " 3 ;" ": 3 *((d-b)/(c-a)) 2 pun=pun+50 2 l$=".---": 2 l$="-..-": 2 b$=" " 2 INSTRUCCIONES 2 ;"CONSTANTE": 2 ;" PERSONAL " 2 ;" CANASTA " 2 ;" " 2 ," ",0 2 *** Salto *** 2 *** Disparo *** 2 (NPROG/DOS) 2 "22",CERO;B$: 2 Salto/Disparo 1 zf=(yf*de)/ 1 z$="00000" 1 yf=(np*a(5 1 xxxxxxxxxxxxxxxxzzzzzzzzzzzzzzzzxxxxxxxxxxxxxxxxzzzzzzzzzzzzzzzzxxxxxxxxxxxxxxxxzzzzzzzzzzzzzzzzxxxxxxxxxxxxxxxxzzzzzzzzzzzzzzzzxxxxxxxxxxxxxxxxzzzzzzzzzzzzzzzzxxxxxxxxxxxxxzzzzzzzzzzzzzzzzzzzxxxxxxxxxxxxxxxxzzzzzzzzzzzzzzzzxxxxxxxxxxxxxxzxzzzzzzzzzzzzzzzzxxxxxxxxxxxxxzzxzzzzzzzzzzzzzzzzxxxxxxxxxzzzzzzxzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzxzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzxzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzxzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzxxzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzxxxzzzzzzzzzzzzzzzzzzzzzzzzzzzzzxzzzzzzzzzzzzzzzz 1 punt=punt+1000 1 pun=pun+100 1 m$=" SOLO TENGO UN DATO": 1 m$=" O.K. STACK 'X' EN MEMORIA "+c$: 1 m$=" O.K. RESULTADO EN STACK 'X'": 1 m$=" O.K. ORDENADA EN ORIGEN EN 'X' PENDIENTE EN 'Y', COEFICIENTE DE CORRELACCION EN 'Z' ": 1 m$=" O.K. MEDIA EN 'X' , DESCIACION TIPICA (STD) EN 'Y', COEFI- CIENTE DE VARIACION EN 'Z' ": 1 m$=" O.K. LAS MEMORIAS 7,8Y9 ESTAN EN UN ARRAY 'R(1,2Y3)', PUEDE INTRODUCIR SUMANDOS " 1 m$=" O.K. FIJO "+ 1 m$=" NO EXISTE ESA MEMORIA" 1 m$=" M(7)=n; M(8)= 1 m$=" CALCULADORA PREPARADA": 1 l$=".....": 1 l$="....-": 1 l$="....": 1 l$="...--": 1 l$="...-": 1 l$="..-.": 1 l$="..--..": 1 l$="..---": 1 l$=".-..-.": 1 l$=".-..": 1 l$=".--.": 1 l$=".----": 1 l$="-....": 1 l$="-...-": 1 l$="-.-.-.": 1 l$="-.-.": 1 l$="-.--": 1 l$="--...": 1 l$="--..": 1 l$="--.-": 1 l$="---...": 1 l$="---..": 1 l$="----.": 1 l$="-----": 1 fv2,cv2;d$(1 1 fb2,cb2;d$(1 1 f+" DECIMALES" 1 f$="este espacio esta reservado para una frase o una serie de datos que puedes imtroducir tu, -rompiendo- el progama y copiandolo en la linea 6000.": 1 d$=" O PROMEDIE EL SUMATORIO" 1 d$=" CALCULAR, SEGUIDA DE 'ENTER'": 1 c$=" INTRODUZCA SIGUIENTE DATO": 1 c$=" INTRODUZCA LA EXPRESION A": 1 a8,b8;" "; 1 a6,b6;" "; 1 a5,b5;" "; 1 a4,b4;" "; 1 a3,b3;" "; 1 a2,b2;" "; 1 a$="PULSA UNA TECLA PARA CONTINUAR..": 1 ^f)+0.55555 1 UNO;"PONGA EN MARCHA LA CINTA"; 1 Transfer 1 TZX por Manuel Gomez Amate 1 TU MISION: 1 T(E)=T(E)+1 1 SPACE-UNO,X1 1 SPACE-UNO,CERO: 1 SPACE,LINEA: 1 SPACE,CERO: 1 SOLTAR ULTIMA LLAVE 1 SOLTAR LLAVE 1 R(n)=M(n+6 1 PRESENTACION 1 P(I)=P(I)+ 1 Morselan 1 Micro-cal 1 MOVIMIENTO DEL MALO 1 MOVIMIENTO 1 MICROHOBBY 1 MICRO-CALC 1 MICRO 1 INIALIZACION 1 I,CERO;,,: 1 Hobby Press 1 HAS TENIDO MUCHA SUERTE! ENCONTRASTES EL TESORO DE LAS 10 LLAVES."; 1 EN BUSCA DEL COFRE 1 DOS=UNO+UNO 1 DISTRIBUYE A SUBRUTINAS 1 Cofre "' 1 Castellano 1 Cargador f 1 Caja 1 CINTA 12 CARA A 1 CERO;" "; 1 CARAA & 1 C$=" Por favor, elija un programa " 1 Buzo Z 1 Boggle 1 Basket 1 B$=" 7-AL FINAL DE CADA PARTIDA CADA JUGADOR DEBE TECLEAR LAS PALABRAS QUE HA ENCONTRADO Y EL ORDENADOR SE ENCARGA DE ANO-TAR LOS PUNTOS 8- CUANTO MAS LARGAS SON LASPALABRAS MAYOR ES SU VALOR 9- EL ORDENADOR SE ENCARGA DECONTROLAR EL TIEMPO Y DE PROPO-NER LA COMBINACION DE 16 LETRAS 10- PARA INTRODUCIR LAS PALA-BRAS ENCONTRADAS ESPERAREMOS A QUE EL ORDENADOR NOS LO PIDA TE-CLEANDOLAS EN ESE MOMENTO; CUAN-DO YA NO TENGAMOS MAS PALABRAS, PULSAREMOS 'ENTER' AHORA EMPIEZA LA PARTIDA SUERTE !!" 1 B$=" " 1 Anillos 1 AS DE LAS CUEVAS LAS TECLAS SON: Q...ARRIBA A...ABAJO O...IZQUIERDA P...DERECHA PULSA UNA TECLA PARA CONTINUAR.." 1 A(I)=B(I): 1 A$=" 1- EN APROXIMADAMENTE 3 MINU-TOS CADA JUGADOR DEBE ANOTAR EN UN PAPEL EL MAXIMO DE PALABRAS POSIBLES, COMBINANDO LAS LE-TRAS PROPUESTAS 2- LAS PALABRAS DEBEN TENER MAS DE 3 LETRAS 3- LAS LETRAS QUE COMPONEN UNA PALABRA DEBEN SER CONTIGUAS POR SUS LADOS O POR SUS ANGULOS 4- LA PALABRA DEBE PODER SER DELETREADA EN SU CORRECTO ORDEN ORTOGRAFICO 5- DENTRO DE UNA PALABRA CADALETRA SOLO PUEDE SER UTILIZADA UNA VEZ 6- PODRAN JUGAR DE 1 A 7 JU- GADORES " 1 ="L")-(378 1 ;m$'c$'d$: 1 ;N$(I);" : ";P(I) 1 ;"y pulsa -ENTER-." 1 ;"o una rapida(C). Elige la opcion"; 1 ;"locidad lenta (A),una normal (B)"; 1 ;"X...El numero no figura en la combinacion. *...Numero acertado,posi- cion incorrecta. ^...Numero acertado,posi- cion correcta." 1 ;"VIDAS:";li; 1 ;"VIDAS: ";: 1 ;"TU TE LO PIERDES": 1 ;"TU ERES UN ANILLO INFILTRADO EN LAS GALERIAS DE UNA CUEVA.ESTAS EN ESTA CUEVA PUES HAS PERDIDO EL DEDO DE TU AMO.AL VER TANTOS DEDOS ALLI DECIDES RECUPERARLOS PERO TU MISION SE VERA OBSTRUIDAPOR LA PRESENCIA DE LAS CRUELES U 1 ;"TIME: "; 1 ;"TIENES QUE VOLVER A LA GRUTA DENTRO DE"; 1 ;"TIEMPO : "; 1 ;"SON DEMASIADAS LETRAS PARA BORRAR": 1 ;"SILENCIO !" 1 ;"SE ACABO!!": 1 ;"RECORD:";r;"$" 1 ;"QUIERES JUGAR OTRA VEZ?"; 1 ;"QUE PASA? TU AMO SE HA PERDIDO OTRA VEZ. TIENES QUE RECUPERARLO" 1 ;"QUE BIEN!! HAS ENCONTRADO TU AMO" 1 ;"Q...Ariba."; 1 ;"PUNTUACIONES" 1 ;"PUNTOS:00000"; 1 ;"PUNTOS:";pun; 1 ;"PUNTOS: ";punt: 1 ;"PUNTO NUMERO";(n)'"ABCISA ? : ";xx 1 ;"PUNTO NUMERO ";(n)'"ORDENADA ? : ";yy 1 ;"PULSE CUALQUIER TECLA." 1 ;"PULSA UNA TECLA"; 1 ;"PULSA (S) O (N)" 1 ;"PASASTE LA GRUTA <<";pant;">> !!!!...." 1 ;"PANTALLA ";pan; 1 ;"PALABRAS ? " 1 ;"P...Derecha." 1 ;"O...Izquireda."; 1 ;"NECESITAS INSTRUCCIONES? (s/n)": 1 ;"MORSILANDIA"; 1 ;"MINUSCULAS"; 1 ;"MICRO-CALC" 1 ;"MEMORIAS"; 1 ;"MAX.:00000"; 1 ;"LO SIENTO. NO HAS RECUPERADO A TU AMO. OTRA VEZ SERA." 1 ;"LO SIENTO LE HAN COGIDO"; 1 ;"LO LOGRASTE!!": 1 ;"LETRA : "; 1 ;"L D"; 1 ;"JUGAMOS OTRA (S/N)?" 1 ;"JUGADOR ";I;" ";N$(I,1 1 ;"INTRODUZCA LOS NUMEROS" 1 ;"INTECTOS" 1 ;"INSTRUCCIONES"; 1 ;"INSTRUCCIONES": 1 ;"INDICACIONES :" 1 ;"IN FRAGANTI." 1 ;"HAS SUPERADO EL ANTERIOR RECORD": 1 ;"GUARDIANES DEL TESORO......... 1 ;"F S"; 1 ;"Es usted un ladron..." 1 ;"EL TESORO ES SUYO": 1 ;"EL RECORD ES ";rec: 1 ;"E E"; 1 ;"DINERO"; 1 ;"DESCANSE EN PAZ"; 1 ;"DEBES DE TENER CUIDADO CON:"; 1 ;"DEBES BUSCAR A LO LARGO DE TODO EL LABERINTO DE UNA EN UNA LAS DIEZ LLAVES QUE TE ABRIRAN EL COFRE QUE TE HARA RICO.": 1 ;"Correcto, Puede grabar el codigo"''"Su version es de ";48 1 ;"Cinta en REC', Pulse una tecla" 1 ;"Cinta en PLAY' para verificar" 1 ;"Cinta en 'REC', pulse una tecla " 1 ;"Cinta en 'PLAY' para verificar " 1 ;"CHIRONA" 1 ;"CENTINELAS DEL LABERINTO...... 1 ;"Buena suerte!!" 1 ;"Banco Central" 1 ;"BOGGLE"; 1 ;"Antes de cargar el codigo en susprogramas, teclee:"'"CLEAR ";58431 1 ;"ANILLO LOCO": 1 ;"A...Abajo."; 1 ;"3. PROFESIONAL ?" 1 ;"20 SEGUNDOS" 1 ;"2. AFICIONADO ?"; 1 ;"1. PRINCIPIANTE ?"; 1 ;"-------------"; 1 ;"****Para oir las tuyas, escribe- las y presiona-ENTER-. Cuan- do las hayas oido, pulsa una tecla." 1 ;"****Para oir la frase que tienes guardada, pulsa '`' y despu- es, pulsa -ENTER-." 1 ;"****Para cambiar la velocidad, pulsa el signo '^' y, despu- es, pulsa -ENTER-." 1 ;"****LO MAS IMPORTANTE:por fa- vor, las frases escribelas en "; 1 ;"**** Puedes elegir entre una ve-"; 1 ;"$$$$$$$" 1 ;" SI SOLO ME DA UN PUNTO, TOMO"'" EL OTRO COMO 0,0": 1 ;" PULSE UNA TECLA PARA CONTINUAR": 1 ;" PULSE 'ENTER' PARA SEGUIR" 1 ;" PARA LA CINTA ": 1 ;" O.K. DETENGO EL PROGRAMA. PARA LISTAR PULSE 'K' Y 'ENTER' PARA SEGUIR PULSE 'C' Y 'ENTER'": 1 ;" O.K. AJUSTE DE RECTA": 1 ;" BRAVO !" 1 ;" Esta usted delante de la caja fuerte del banco Central.Averi- gue la combinacion en el menor numero de intentos posible y antes de que llegue la policia." 1 ;" PULSA UNA TECLA " 1 ;" STOP "; 1 ;" ESPACE VUELVE A MENU " 1 ;" " 1 ;" ERROR EN DATAS " 1 ;" ALTO POLICIA ! " 1 ;" "; 1 ;" ": 1 ;" " 1 ;" "; 1 ;" 1 2100401158E401001BEDB0C92158E411004001001BEDB0C9s 1 ,D.L.: M-36598-84 1 ,"Pulsa una tecla para empezar...." 1 ," Por Carlos Cervera " 1 ," ",5 1 ," ",4 1 ," " 1 *v;"K."''"Para guardar una pantalla:"'"RANDOMIZE USR ";58432 1 *v''"Para recuperarla:"'"RANDOMIZE USR ";58444 1 *v''"Para cargar el codigo, teclee:"'"LOAD ""C/M""CODE" 1 *** NIVEL 2 *** 1 *** NIVEL 1 *** 1 *** CINTA-MICROHOBBY *** 1 ** NIVEL 4 ** 1 ** NIVEL 3 ** 1 ** Movimiento ** 1 *(b$="SC")+1500 1 *(b$="PR")+1800 1 *(b$="ME")+1000 1 *(b$="DE")+1100 1 *(b$="BM")+900 1 *(b$="AJ") 1 (e/(j*i));"$" 1 (de*(np*a(4 1 (VALOR)<"A" 1 "Opcion ? ";z$ 1 "OTRA PARTIDA ?",A$ 1 "NUMERO DE PUNTOS? : ";np 1 "NUMERO DE JUGADORES ? ",N: 1 "MicroHobby Semanal numeros 45 a 48 1 "MICRO-CALC" 1 "E-Morselan","F-Micro-cal","G-Caja","H-Boggle","I-Transfer" 1 "BM : BORRA MEMORIAS 7,8Y9 ","MEn : STACK 'X' A MEMORIA n ","DEn : FIJAR n DECIMALES ","Sx : SUMATORIO ","Nx : MENOS SUMATORIO ","PR : PROMEDIAR EL SUMATORIO","AJ : AJUSTE DE RECTA ","SC : SCROLL DE MOMORIAS "," !: FACTORIAL .K: CONSTANTE" 1 "A-Anillos","B-Buzo","C-Basket","D-Cofre" 1 "64"+NPROG) 1 "5";"cara: "; 1 "5";"Programa: "; 1 "5";"Programa inexistente": 1 "5";"'R' Vuelve al menu" 1 "5";"'L' Carga el programa"; 1 "32"-I;C$( 1 "22",CERO;C$(I 1 "22",CERO;B$ 1 "22",CERO; 1 "2100401158E401001BEDB0C92158E411004001001BEDB0C9" 1 " NOMBRE DEL JUGADOR ";I;"?" 1 " Tus movimientos son:" 1 " Muchos han sido los osados que lo intentaron rescatar,pero fracasaron." 1 " En una cueva perdida,se haya un gran tesoro custodiado por unpulpo gigante." 1 " Ahora tu tienes la oportuni- dad de rescatarlo de las profun-didades del mar." 1 ZX Spectrum 16-48 K. 1 SUMATORIO 1 SCROLL DE MEMORIAS 1 SALVA EN CINTA 1 REALIZA EL CALCULO 1 PROMEDIA EL SUMATORIO 1 PERSONALES 1 PARO POR STOP 1 MENSAJES SIN DETENCION 1 MENSAJES DE ERROR 1 MENSAJES CON DETENCION 1 MENOS SUMATORIO 1 Lorenzo Diaz" 1 Jugadores 1 Inicializacion 1 INICIALIZA VARIABLES 1 IMPRIME MEMORIAS 1 IMPRIME EL STAC 1 FIJA DECIMALES 1 FIJA CONSTANTE 1 FACTORIAL 1 DETENCION HASTA ENTER 1 DESPLAZA EL STACK 1 DEFINE FUNCIONES 1 DEBERAS DE IR A SOLTAR LAS LLAVES DE UNA EN UNA": 1 Codigo Maquina 1 Car. Graficos 1 CANASTAS 1 CALCULA CONSTANTE 1 BUCLE PRINCIPAL 1 BORRA MEMORIAS 7,8y9 1 APUNTA EN MEMORIA 1 AJUSTE DE RECTA 1 ****************** 1 * ALMACENAMIENTO * 1 * PANTALLAS * 1 * DE * 1 UNA TECLA 1 PULSE 1 PULSE UNA TECLA 1 " 1 1